home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / diskmags / 3565-4.665 / dmg-4182 / source / radro.bas (.txt) < prev    next >
Atari STOS Basic  |  1987-04-21  |  4KB  |  66 lines
  1. 10 MODE
  2. 100 CLW
  3. 1000 VARNAME
  4. 1001 INK
  5. 1002 ON
  6. 1004 VARNAME
  7. 1006 VARNAME
  8. 1008 VARNAME
  9. 1010 VARNAME
  10. 1012 GOSUB
  11. 1013 IF
  12. 1014 INK
  13. 1016 GOTO
  14. 1018 INK
  15. 1020 ON
  16. 1022 VARNAME
  17. 1024 VARNAME
  18. 1026 VARNAME
  19. 1028 VARNAME
  20. 1030 GOSUB
  21. 1031 IF
  22. 1032 INK
  23. 1034 GOTO
  24. 1036 INK
  25. 1038 VARNAME
  26. 1040 VARNAME
  27. 1042 IF
  28. 1043 GOSUB
  29. 1044 IF
  30. 1046 INK
  31. 1048 RETURN
  32. 110 VARNAME
  33. 120 VARNAME
  34. 130 GOSUB
  35. 139 VARNAME
  36. 140 VARNAME
  37. 141 LOCATE
  38. 145 VARNAME
  39. 15 PALETTE
  40. 150 GOSUB
  41. 152 IF
  42. 153 IF
  43. 155 IF
  44. 156 IF
  45. 1999 IF
  46. 20 VARNAME
  47. 2000 IF
  48. 2001 IF
  49. 2002 IF
  50. 2003 RETURN
  51. 30 DIM
  52. 3000 ON
  53. 3001 VARNAME
  54. 3002 VARNAME
  55. 3003 VARNAME
  56. 3004 VARNAME
  57. 3010 RETURN
  58. 40 FOR
  59. 50 FOR
  60. 60 FOR
  61. 70 VARNAME
  62. 80 IF
  63. 90 VARNAME
  64. 998 GOTO
  65. 999 GOTO
  66.